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SEQ OCOl 



.REM 



IDENTIFICATION 

PRODUCT CODE: AC-E736E-MC 

PRODUCT NAME: CXRXAEC DEC/Xll RXOl FLOPPY DISK fCDULE 
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WITHOUT NOTICE AND SHOULD NOT RE CCNSTPUED AS I COMMITMENT 
PY DIGITAL EQUIPMENT CORPORATION. DIGITAL EQUIPMENT 
CORPORATION ASSUMES NO PESPONS IP IL I TY FOR ANY ERRORS THAT 
»^AY APPEAR IN THIS MANUAL. 

THE SOrTwAFE DESCRIBED IN THIS DOCUMENT IS FURNISHED TO Th.E 
PURCHASER UNDER A LICENSE FOP USE ON A SINGLE COMPUTER 
SYSTEM AND CAN EE COPIED (WITH INCLUSION CF DIGITALS 
COPYRIGHT NOTICE) ONLY FOR USE IN SUCH SYSTEH, EXCEPT AS MAY 
OTHERWISE RE PROVIDED IN WRITING BY DIGITAL. 

DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR 
THE USE OR RELIABILITY OF ITS SCFThARE ON EQUIPMENT THAT IS 
NOT SUPPLIED BY DIGITAL. 
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1« ABSTRACT 



FXA IS AH lOHOD THAT EXERCISES TiO RXOl FLOPPY DISKS 
ON THE UNTBUS« IT EXERCISES BOTH DRIVES BY WRITING AMD 
READING ALL AVAILABLE DRIVES* 

ERRORS ARE CHECKED FOR BUFFER FILL^ MRITE^ READ, A8D DATA 
COHPARE. TWO RETRIES ARE DONE FOR EACH MRITE OR READ STATUS 
ERROR* ALL ERRORS ARE REPORTED ON THE CONSOLE TTY« 



2. 



REQUIREMENTS 
HARDMAREt 



1 OR 2 DISKETTES MITH AN RXOl CONTROLLER 



STORAGES S RXA REQUIRES! 

1« DECIMAL MORDSI 1091 
2« OCTAL MORDSS 02103 
3« OCTAL BYTESS 4206 



3« PASS IDENTIFICATION 

ONE PASS OF THE RXA MODULE CONSISTS OF THREE WRITE AND 
READ PASSES OF THE AVAILABLE DRIVES* THE TEST SEQUENCE 
liRTTES THEN READS EVERY THIRD SECTOR OF EVERY TENTH TRACK 
STARTING AT TRACK 1 SECTOR 1« 

THREE CYCLES OF THE DISKETTE ARE MADE FOR EACH PASS: 
U STARTS AT SECTOR 1/TRACK 1 
2« START AT SECTOR 27TRACK 1 
3« STARTS AT SECTOR 3/TRACK 1 

END OF PASS 
RESTART SECTOR CYCLE AT SECTOR 1/TRACK 2 

4. EXECUTION TIME 

ONE PASS OF RXA RUNNING ALONE ON THE PDP'-ll/OS TIKES 
APPOXIMATELY .15 MINUTES FOR 2 DRIVES. 



5« CONFIGURATION REQUIREMENTS 

DEFAULT PARAMETERS! 

DEVADR: 177170# VECTORS 264# BRlS 5^ DEVCNTI 2 
REQUIRED PARAMETERS! 
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SEQ 0C03 



mm 



6« DEVICE/OPTION SETUP 



ASSURE ALL DRIVES ARE POWERED UP^ DISKETTES IMSTALLED^ 
AKD READY« 



7. MODULE OPERATION 

TEST SEQUENCESS 

A. SETUP DRIVE REGISTER ADDRESSES AND MODULE VARIABLES 
B« SELECT DRIVES FOR TEST - IF NONE AVAILABLE, DROP MODULE 
C, INITIALIZE DRIVES 
0- SELECT A DRIVE 

E« ^RITE DRIVE - IF ERROR^ REPORT AND 
RETRY UP TO RETRY LIMIT. 

F. READ DRIVE - IF ERROR, REPORT AND 

RETRY UP TO RETRY LIMIT. 

G. DO DATA COMPARE FOR THE READS - IF ERROR, REPORT 

H. IF NOT DONE ALL DRIVES - GO TO D 

I. IF END OF PASS, REPORT AND GO TO B 

J- ELSE UPDATE STARTING ADDRESS, GO TO D 

8. OPERATION OPTIONS 



SRI BIT CLEARCO)S 

IF RETRY LIMIT IS EXCEEDED, CONTINUE ilTH iEXT TEST. 

SRI BIT SET(1}S 

IF RETRY'lIMIT IS EXCEEDED ON ANY FUNCTION, REPORT A 
HARD ERROR AND DROP THE MODULE. 

SRI BIT 1 CLEAR(0)2 

USE ALTERNATING DATA PATTERN OF ONES AND ZERGS« 

SRI BIT 1 SET(1)I 

USE DECREMENTING DATA PATTERN STARTING MITB 
A RANDOM NUMBER. 



■ 
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9. NOK'-STANDARD PRINTOUTS 



ALL PRINTOUTS HAVE THE STANDARD FORMAT DESCRIBED IM THE 
DEC/Xll DQCUHEKT. 

ERROR MESSAGES DUMP THE CONTENTS OF THE RXOl REGISTER 
I!^ THE FOLLOWING ORDER* 

RXCS (COMMAND REGISTER) 

RXES (ERROR REGISTER) 

RXSB (STATUS REGISTER) 

RXTA (TRACK ADDRESS) 

RXSA (SECTOR ADDRESS) 

DATA ERRORS REPORT UP TO 3 BAD I^ORDS^ THEN DISCOKTIiUE CHECK 

RETRIES! EACH iRITE OR READ STATUS ERROR IS 
ACCOMPANIED BY A RETRY NUMBERS 
RETRY 01 IS THE ORIGINAL ERROR 

RETRY 12 IS THE FIRST RETRY OF THAT ERROR (SAME ADDRESS) 
RETRY 21 IS THE SECOND RETRY CF THAT ERROR (SAME ADDRESS) 

MOy DROP THE MODULE IF SR1=1 OR 

CONTINUE TO MEXT ADDRESS IF SR1=0 
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,40,61 

.TITLE RXAE DEC/Xll SYSTEM EXERCISER MODULE 
? DDXCOM VERSIOM 6 23-MAY-78 

{&i§l*«*lift* A A A ft* A «A*ft«ftA«*Aftftft ft ft* «««««««« 

OOOOOn* BEGIN* 

054122 042501 040 MOOMAM: .ASCII /RXAE / JMODOLE MAMB. _ 

BYfE PRTYO^O IjliD BR LEVEL. 



.BYfE PRTY0*6 llMD BR LEVEL . 

5O0$6| DVlDi: 2ii„ ;bevice iIdicator^i. 

Ill 



OOOQQO SRI: OPBIi ISHITCH REGISTER 

OPEH ;S«1TCH REGISTER 

OPEN ;Sli|TCH REGISTER 



« *4E*ftft«**«l**A««ftftAAft«AftA««ft«««Al§l*lS**§lSif l*§***ft*ft«**«AAAAflfi Aft 

;STATUS WORD. 

;MCDULE START ADDR. 
INCDULE STACK POINTER. 
?PASS COUNTER. 



000000 RAMNUM: ;HOLDS RANDOM U UHEN RAND MACRO IS CALLED 

CONFIG: SbESERVED FOR MONITOR USE 

000000 i^H' § ?RiSERVEO FOR MONITOR USE 



000000 RES2: ;R|SERVED 




;j OF ITER, 



T|ONS_£||_PASS=40 



ftJIlraFTERFOXS 

;LOC TO SAVE TOTAL HARD ERRORS 
",0C TO SAVE SOFT ERRORS PER PASS 
,0C TO SAVE HARD ERRORS PER PASS 
RRORS ACCUMULATED 



SVRO: OPEN ;LOC TO SAVE RO 

yoi- yyyyyg SVRl: OPEN ;LOC TO SAVE Rl. 

066' gOOgOO SVR2: open ILOC to save R2. 

070' 000000 svr|: open )lgc to save R3. 

072' 000000 svr4: open ;lcc to save r4. 

074' ggoggg svrs: open ;loc to save rs. 

976! ihm mh Qm ^^sc„To„sAjj|^Ri. 



W monitor USE 



,AODR OF CURRENT CSR. 
;ADDR OF GOOD DATA, OR 

ISTATUS REG CISnTENTS. 
;T¥PE of ERRCR 
;|XP|CTED DJTA- 

IreItart adoPess after end of pass 
;mgros to memory per iteration 
;hqrds from memory per iteration 

U OF INTERRUPTS PER ITERATION 
^MODULE IDENTIFICATION NUMBER=e7 
;MCDULE stack STARTS HERE. 
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.WORD 
.LIST 
.ENDR 



;SSfSftA*ftftftAAftftft«ftft*«AA*A*AftAAA*A4aAft««*«ftft««*AA«*aAft*A**ftftftftfta<»aftftftftfta* 



J 
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012777 
004767 



COOOOO' 
OOOOOl 



C0C013 
001744 



002276 
177352 



003556' 
002164 
002214 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
CMPB 
BNE 
BIC 
BIT 



TGO: 
UNTO: 



164.,HDTC 
l^SASAV 
ASAV,TA 
SASAVfSA 



;64 words to mem/iteration 

Spseset sectcr address 



;PRESET INTERNAL PASS COUNTER 

iOV m^UVFLG ;->ONE INTERNAL PASS WITH DATA = 

Sp'b S[J°|iS?"" fePic«''5f''pL???r«« LCD NECIUH 

H„-t»,a jj, j,Q 

;kill test for drive o 

;NAS IT TO BE TESTED? 



BEQ 
MSGNS, 



MOV 
MOV 
MOV 
CLR 
DEC 
BHE 
JSR 



EST 

1/DViDlX 
BEGIN, NUNTO 



SPOINT/SP 

"UNITO<.RO 
10, R1 
RO)* 

ch 

PCVSET 
4OOOO^0RXCS 



C,AWDN 



MOV 

JSR r».,aBu 
TST gRXCS 
BPL tGO 
MSGNS, BEGIN, DRPl 
MOV BRXCS,SRXCS 
i40006,SRXCS 
§RXDB,SRXES 
SA,SRXSA 
SRXTA 

SRXCS,ACSR 
RXCS,CSRA 
SRXES,ASTAT 

-^RXDB^SRXSB 



BIS 
MOV 
MOV 
CLR 
MOV 
MOV 
MOV 
MOV 
JSR 
MOV 



;lsc!l SisSAGE CALL HITH COMMON HEADER 

;SET STACK POINTER 
;CET START OF TABLE 
>SET SIZE OF TABLE 
;CLiAR TABLES 
;SgE IF DONE 
;IP NOT: BR 

;6C SETUP ADDRESS AND VECTOR 

;I»IT UNIT Q 
)GC AWAIT DONE 
;SEE IF ERROR CN INIT 
;IF NOT: BR 

;ASCII MESSAGE CALL WITH COMMON HEADER 
JGET RXCS 

;SET SRXCS TC SHOW INIT COMMAND 
;get RXES 

SGET SECTOR ADDRESS 



TRACK ADDPES 
CONTENTS OF 



-XCS 
RXCS 



RDERS,BEGIN,TABLE 



?SIT ADDRESS OF 
;GET RXES 
5READ STATUS B 
;GC AWAIT DOME 

;get status B 

***************** 



JMP 



MSGNS, BEGIN-NUNTO 
BR yNTl.. 

BEQ 
MOV 
JSR 



;GG DROP MODULE 



ffl3,eRXCS 
PC,AaDN 



;ASCII MESSAGE CALL WITH COMMON HEADER 
; GO DESELECT UNIT 
;SEE IF INIT 
;IF NOT: BR 

JREAD STATUS OF UNIT 
;GC AWAIT DONE 
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MOV 
BIT 
BNE 



SRXDBjrRO 
i200,R0 
UHTlS 
MSGNS, BEGIN, NUNTO 

HRDERSfBEGIN,NULL 



;GET RXES 
jSiE IF DRY 
;IF so: BR 



UNTl: 
UNTIA: 



1$: 



002440 
002426 



060' 01 

064' 0l_.„. 

070' 00S76l 

074' C01402 



1701 



000236 



000100 



#-l,UNITO 
|2,DVID1X 

sis, gRXCS 
PC^ABDN 
@RXDB£RO 
|200,«0 



fiov 

BIT 
BEQ 
MOV 
JSR 
MOV 
BIT 
BNE 

MSGNS, BEGIN, NUNTl 
MOV «6,ERRTYP 

HRDERS, BEGIN, NULL 

MOV #-l,yNITl 
TST OnITO 

BEQ TST 
MSGNS, BEGIN, DRP2 
JMP FINI 



>ASCII MESSAGE CALL WITH COMMON HEADER 

ft«*l§§l«l^*liEl§lti« Aft 

;UKIT NOT AVAILABLE 
************************* 



;DESELECT UNIT 
jSiEIF UNIT 1 



JSR 
JSR 
MOV 
JSR 
MOV 
JSR 
JSR 
JSR 
MOV 
JSR 
MOV 
JSR 
JSR 
ENDITS 

JSR 
BR 



PC,DSUP 
PC,SELD 
«260,flTYN 
PC, WRITE 

PCDCHK 
PCSSELD 

1260, RTYN 
PC, READ 
PC,DCHK 
,BEGIN 

PC,TSS 
TST 



,IF NOT: BR 
;REAO STATUS OF UNIT 1 
)GC AWAIT DONE 
;READ RXES 
;SEE IF DRY 
;IF so: BR 

;ASCII MESSAGE CALL WITH COMMON HEADER 
SNCT AVAILABLE 
**«««*•*******«*«*************«*««******** 

SDNIT 1 NOT AVAILABLE 
ft***************************************** 

^DESELECT UNIT 1 
;SfE IF UNIT READY 

;IF so: BR 

;ASCII MESSAGE CALL WITH COMMON HEADER 
;GC DROP MODULE 

;SET UP THE DATA 

;GC SELECT UNIT 

;BESET RETRY COUNTER 

;G0 WRITE 

;SET RETRY LIMIT 

;READ THE DATA 

;CNECK THE DATA 

;SELECT ANOTHER DRIVE 

;SET RETRY LIMIT 

;NRITE AGAIN 

;Slt RETRY LIMIT 

;NCM READ THE STUFF 

KRECK THE DATA 

;SIGNAL END CF ITERATION. 

^NGNITOR SHALL TEST END OF PASS 

;UPDATE TRACK S SECTOR 

>GC DO AGAIN 



ENDS, BEGIN ;DROP THE MODULE 

;SET UP DATA BUFFER********** 



076' 005003 
100' 000417 



MOV 
MOV 
TST 
BEQ 
CLR 



|100,R0 
8WBUP,R1 

HVFLG 



;SEf SIZE OF BUFFER 
5SET START OF BUFFER 
;«INTERNAL PASS DATA 
;4ALLREADY OQNE:BR 
S4yES LOAD BUFFER 
MhlTH ZEROS 



RXAE D 
XRXAEO 

357 
358 
35? 



III 
i 
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377 

m 



032767 
"14" 



001102 - 
001110- 001411 

mm' nm 
mm- Ml 
Ml mm 

iill* 812783 

mm Mill 

001146- 000207 



000002 



001602 
001572 
001566 

001544 
001532 
001530 
00 



m 



1$: 
2$: 



002206 



1$: 
2S: 
3$: 



BIT 

BEQ 

HOV 
DEC 
DEC 
Bp 
RTS 
HOV 
MOV 

m 

RTS 

;SELECT 
TST 

m 
m 

BR 
MD¥ 
MOV 
CLR 
RTS 
TST 
BEQ 
COM 



USB RANDOK DATA? 
BRANCH 



125125,83 
-*#(R1)+ 



MOV 
RTS 



UNIT FOR TEST 

DRVN 

uiiTi 

DRVN 

fpfUTT 
P61/DNUH 
DRVN 
PC 

^NITO 

DRVN 
SELD 
DRVN 

|Ilo,DHUK 
PC 



NO: 

}* WITH DECREMENTING 
M CHARACTERS STARTING 

UUSE ALTERNATING 

S* ONES AND ZEROS TO 



IF DR 



DRIVE 



IT 1 AVAILABLE 



NIT IS AVAILABLE 
OER TEST 



•1 

JsET^UNIT UNL_. 

;SEi DRIVE NUMBER FOR PRINTS 
;CLEAN DRIVE NUMBER 
;RETURN 

;SEE IF UNIT AVAILABLE 
;IF so: BR 
;SHITCH UNITS 
;SELECT NEXT 

\itm mu 

}SET DRIVE NUMBER FOR PRINTS 
;RETURN 




403 

408 
409 
410 
411 
412 



176516 001516 

mm mm 



001310- 
001316- 



101401 
OOO4-- 



26- 0004 
30' 0167 



016767 
062767 



000003 
000033 



001444 
000012 



001456 
001450 



001436 
001426 



2$: 



; VECTOR SET UP 



MOV 

MOV 
MOVB 
MOV 
HOV 

m 



|NTRypf^(RO)+ 



RypT^( 

DRX£(RO) 

ADDR,RXCS 



;SET UP INTERRUPT HANDLER ADDRESS 
;SET BR LEVEL 



;s 



SET ADDRESS OF RXCS 

m mm 



; TRACK AND SECTOR UPDATE********** 



ADD 

CMP 

BLOS 

BR 

HOV 

ADD 



SA 
SA 



SA^AVfSA 

#12, tI 



;BUHP SECTOR ADDRESS 
;SEE IF DONE SECTORS 
;IF SO: BR 

;return 

IRESET SA 

;IHCREMENT TRACK ADDRESS 
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iim- iiii 

001411 



001372 

88ilo?' 

001414- 000427 

001416- 022767 

mm' hm 

001434- 000417 

mm ii 

"111: ii 



1474- 
11502- 
11510- 




001512^ 01276 




001240 
001240 



4400 COOOOO- 



003520' 
176250 

000000 

001106 
001100 
001122 

001112 

001100 



1$: 



2S: 



SEQ 0010 



CMP 

BHIS 

MOV 

INC 

TST 

BEQ 

CLR 

MOV 

MOV 

BR 

CMP 

ggs 

BR 

MOV 

MOV 

INC 

CMP 

BNE 

MOV 

MOV 

m 




;SEE IF DONE TRACKS 

;IF NOT: BR 

;reset track address 

;bomp internal starting sector 

;4kRiTiNG special data pattern? 

}*m : CONTINUE 

;4ves;have cycled 

^4liOH R|pT POINTg 



THRU BOLTH DRIVES ONCE 
/-rnuH Kopcx ruAHiERS TO VRITE 
MSAHE PLACES hlTH REGULAR PATTERN 



J4,PCNTR 
P^NTR/SASAV 



,TASAV 



;SEE IF DONE THREE 

siF so: BR 

7ELSE BUMP STARTING SECTOR ADDRESS 

;SAVE TA AND SA AND LEAVE 

;RESET PASS COUNTER 

IRESET STARTING SECTOR 

)B0HP STARTING TRACK ADDRESS 

;SEE IF DONE TRACKS 

;IF NOT: BR 

;ELSE RESET TRACK STARTING ADDRESS 
;SAVE TRACK ADDRESS 
;SAVE SECTOR 



;WRITE SUBROUTINE********** 



MOV 
MOV 
HOV 
MOV 
MOV 
JSR 
MOVB 
DEC 
BNE 
JSR 
TST 
BPL 
MOV 
MOV 
BIS 
MOV 



CHD 
HTF 



Rl 



CMDf BRXCS 
PC,l8TR 
|R1)*,@RXDB 

pLamdn 



RXCS 
^$ 

RXCSfCSRA 
CMDeACSR 
0RXCS,ACSR 
nu« gRXDBfASTAT 
MSGNS, BEGIN, BFER 

HRDER$,BEGIN,NULL 
• ****************** 

MOV UTT,CMD 
BIS POS^CMD 

cr- *— - 



;SET TO FILL BUFFER 
5SET WRITE FLAG 

;LCAD COMMAND 

;GQ await TRANSFER READY 

IFILL BUFFER 

;SEE IF DONE FILL 

;IF NOT: BR 

;GQ AWAIT DONE 

;SEE IF ERROR 

;IF NOT: BR 

;LGAD ADDRESS OF RXCS 

iim iTs""" 

;LOAD RXES 

/ASCII MESSAGE CALL WITH COMMON HEADER 



MOV 



CMD,BRXCS 



JSR pc,aStr 

MOV SA,flRXDB 
JSR PC,AWTR 
MOV TA^eRXDB 
EXITS, BEGIN 



ft* *fi*ft««**«**«*ft*«***«*««4ft*««*ft ******* ****** 

SBUFFER FILL ERROR 

««*****«««***« ft** ««4*««««*«*ft*ft*ft«** A ******** 

;SELECT DRIVE 

;SET TO WRITE SECTOR ♦ INT ENABLE 
;LOAD COMMAND 
;GG await TRANSFER READY 
2LOAD SECTOR ADDRESS 
>GC AWAIT TRANSFER READY 
;LGAD TRACK ADDRESS 

;EXIT to monitor, module wait for INTERRUPT. 



RXAE D 
XRXAEO 
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m mil — 



0Q1002 




l$s 



1$: 



OQOOOO' 
C00037 



104405 000000' 



003464' 
175664 

003032' 



2S: 



PIRQ$^BEGIII,1$ 

; 



; QUEUE UP TO CONTIRUE AT 1$ AND RTI 



JSR 
MOV 
TST 
MOV 

RTS 



PC^SECK 
VECTOR^RO 



RO) 



;6C CHECK FOR ERROR 
;6ET VECTOR ADDRESS 

;?OMP EOINTgR 



1 



jassure reset to br level 
Jreturh 



;reao subroutine** 



**«***«« 



clr 

MOV 
BIS 

w 



«107eCHD 

CMD<gRXC 

PCASTR 

SA,@RXOB 

PC/AHTR 



WTF 

UTT#CMD 
ilOlfCKD 
CMD^gRXCS 

SR ~" " 

MOV 
JSR 

MOV TA;@RX0B 
EXITS/BEGIN 

JSTATOS ERROR CHECK 
6lr SERFL 
BIS gRXCS, 
TST CM" 

BMI 
RTS 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
NOV 
MOV 
BIS 
MOV 
JSR 
MOV 
TST 
BME 

MSGN$,BEG|H,RTER „ 



;CLEAR WRITE FLAG 
;SELECT DRIVE 

;SET READ COMMAND « INT EHB 

;LOAD COMMAND 

;GC AHAIT TRANSFER READY 

;LOAD SECTOR ADDRESS 

;GQ await TRANSFER READY 

ILDAD TRACKjADDRESS^j^^^^ MODULE WAIT FOR INTERRUPT. 



CMD -'^"'^ 

n 

CND#SRXCS 

CMD#ACSR 

RXCS.CSRA 

TA,SRXTA 

SA,SRXSA 

gRXDB/SRXES 

SRXES.ASTAT 




DB,SRXSB 



SUBROUTINE******* 

SCLEAR STATUS ERROR FLAG 

5get RXCS 
;SEE IF ERROR 
;IF SO: BR 

mil iirs"" 

}LBkD RXCS 

;L0AD ADDRESS OF RXCS 

;LOAD TRACK 

;LCAD SECTOR 

;GET RXES 

;LGAD RXES 

SSELECT DRIVE 

>LOAD READ STATUS fi COMMAND 

;execute command 
;gc await done 
;l0ad status b 

;SEE IF WRITE ERROR 
;IF so: BR 

;ASCII message call with common HEADER 



******** ««ft***a«*«««4««**ft**4*ft* ****** ******** 

fiRDER$#BEGIN^ TABLE xREAD ERROR 

•ft***«lA****C «**«***« ***%«*««*******«««*«*********«*«*«« ******** 
JMP CLEAR ;G0 CLEAR ERROR 

MSGNS, BEGIN, WTER ;ASCII MESSAGE CALL WITH COMMON HEADER 

^*2*****i*2cS***)(S** ********************************** ********** 

vi§lllfliiii«lllli******llllll*i§l§§***********«******««******** 

;CLEAR ERRORS******* 
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SEQ 0012 



INC 
TST 
BEQ 
MOV 
JSR 
TST 
BPL 

MSGN$, 
'MP 
_HC 
MOV 
BIC 
CMP 
BNE 
MSGNS 
BIT 
BEQ 
JMP 
TST 
TST 



SERFL 
SRXSB 

|RXCS 
BEgIn4DRP3 



RTYH,R3 
1775- 



70, R3 



FINI 

(SP)-i^ 

WTF 

wilTE 

READ 
|260,R 



;DATA CHECK SUBROUTINE********** 




;SET STATUS ERROR FLAG 

;SEE IF SB ERROR 

;IF NOT: BR 

;IRITIALIZE 

;G0 AWAIT DONE 

;SEE IF ERROR CM IHIT 

;IF NOT: BR 

;ASCII MESSAGE CALL WITH COMMON HEADER 

;GET COUNTER 
;MARK ASCII 

;ASCII MESSAGE CALL WITH COMMON HEADER 

;SiE IF SHOULD DROP NODULE 

;IF NOT: BR 

5gC DROP NODULE 

;RESET STACK 

;S|E„IF WRITE TIME 

JIF NOT; BR 

>R£TRY WRITE 

;RBTRY READ 

5B|||T retry COUNTER 



;SEE IF STATUS ERROR 

;IF not: BR 



;EXIT IF STATUS ERROR 
;CLEAR BAD WORD COUNTER 

;SET SIZE OF BUFP"" 
^ADDRESS OF READ 



OF B0FFE„ 
F BEAD BUFFER 

;lqad read buffer command 
;go await transfer ready 

lEMPTY BUFFER 

5siE IF EMPTIED ENTIRE BUFFER 

;IF NOT: BR 

;G0 await DONE 

SCLEAR WORD COUNTER 

5SET ADDRESS OF WRITE DATA 

;SET ADDRESS OF READ DATA 

;TiST DATA 

;IF DATA bad: BR 

>eONP ADDRESS OF DATA POINTER 

;BOMP WORD COUNTER 

;SEE IF DONE ALL 

;CHiCK ALL 

;iF done: exit 
;lcad good address 

;LOAD BAD address 
;LOAD GOOD DATA 
;LQAD BAD DATA 

lASCII MESSAGE CALL WITH COMMON HEADER 
***%*** ******** It*** ************** ********* 



RXAE DEC/Xll SYSTEM EXERCISER MODULE 
XRXAEO.Pll 12-0CT-78 12:16 



m 
m 

IP 



i 



002522' 
002526' 



104404 
005267 
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254- 
2542 



2' IosIjI 



236 
003 



ill 88: 



002544' 005067 
002550' 032777 
002556' 001032 

m ii 

002574' QQ136 

mm' nm 

002624' 01 



000234 

000040 000232 



audn: 
IS: 



Ml mm 

'000' 003566' 
040 175254 

002632' 104405 000000' 000000 

176210 



11 M' 888!8? 



2S: 



002646 
-0265' 




175152 



002734' 104405 000000' 000000 



2S: 



I III 

634 002756 ^, 

635 002760' OOOOfiO 

636 002762' 000000 



SEQ 0013 



|NC eVCNf IBUMP BAD WORD COUBTER 

CMP «3,BVCMT ;SEE IF 3 BAD WORDS 

BNE §1 ;IF NOT: BR 

RTS PC IRETRUN 

;AWAIT done BIT SOBROOTINE******* 



CLR TOCNT 

BREAKS, BEGIN 
BREAK$, BEGIN 
INC fpCNT 
BNE is 
CLR ASTAT 
MOV RXCSfCSRA 
HQV CMD/ACSR 
MSGN$,BEGIN,ONTO 



DVIl 
UN* 
UN_„ 
DRVN 

cmd: 

OTT: 



iDix: 

{??! 



^PRESET TIME OUT COUNTER 



HE SET 



MPORARY RETURN TO MONITOR.. . 
|p Ca||Ili0| AI .NgXT INSTRUCTION. 

NOT TIM 

BAR STAT 

T ADDRESS OF RXCS 
T COMMAND NGRD 
-—AGE CAL 



y RETURN TU MO 
TINOE AT NEXT 
E OUT COUNTER 
IMBD OUT: BR 
ATOS HORD 



3MP 
RTS 

;AHAIT TRANSFER READY SUBROUTINE 



SCli'MMSSlGE CALL HITR COMMON HEADER 

********************** 

;DI10P MODULE 

;exit 



CLR 
BIT 



TOCNT 

||00#@RXCS 

_.EAKS, BEGIN 
BREAK$,BEGIN 
INC TOCNT 
BNE IS 
CLR ASTAT 
NOV RXCSfCSRA 
MOV CND,ACSR 



JPRESET TIME OUT COUNTER 
--EE IF TRANSFER READY SET 

, .ImPoIaIy return to MONITOR.... 

;then continue at next instruction. 
;eomp time out counter 
not timed out: br 
ar status nord 



'I "r* 

-sePaddressof'rxcs 



;SET COMMAND NGRD 

;ASCII message call HITH common HEADER 



msgns^beginJtrto 

* ft* ft*** **************** *A*«Ad!«« Aft 



hRDER$,BEGIN«NULL ITRANSFER REIDY TIME OUT 

y*************************** **************************** ******** 
3mp FINI 
RTS PC 



;gc drop module 

;RETURN 



;FLAGS and COUNTERS***** 



;holds which drives to test 



;UMIT FLAG 
>0R|T 1 FLAG 
;DRIVE NUMBER 
;CCMMAND SAVE 
;URIT UNDER TEST 
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QQOdOO 
000000 



li- nil 
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SERFL: 

htf: 

BHCNT: 

ta: 
Sa: 

TASAV: 
SASAV: 

pcntr: 

TOCNT: 

hvflg: 



SEQ 0014 



;STATUS ERROR FLAG 
;i 



IP 

?cy 



BITE FLAG 

HORD COUNTER 

gRRiSiJI^Je'SSeiiis 



^STARTING TRACK ADDRESS SAVE 
{starting SECTOR ADDRESS SAVE 



CA3 



e'verify flag 

i* NOT EQ ZERO 

il 

i* EQUAL ZERO 
}* 
}* 

I* 
}* 



...ACK'S SiCfp OFFSE' 
CB3 USE DATA PATTERN 



TERNAL PASS 



CA3 ALLOW INTERNAL PASS 

TRACK & SECTOR OFFSETTING 
CB] USE DATA PATTERN DEFINED 



BY SRI. 
(RANDOM OR ONES AND ZEROS). 



RXAE DEC/Xll 

XRXAEO-Pll 



SYSTEM EXERCISER MODULE 
12-0CT-78 12:16 



RXCS! 
TPCNTR! 
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;COHSTANTS********** 



SEQ 0015 



;T0TAL pass COQNfER 



;VAR1ABLES 



;HESSAGE table********** 



SRXCS 
SRXES 
SRXSB 
SRXTA 
SRXSA 
-1 



.ASCIZ 



.ASCIZ 
•ASCIZ 



WRITE error: retry: 
READ error: retry:' 



drive ' 
drop module)' 



.ASCIZ '% INITIALIZE ERROR:' 
.ASCIZ •% NO UNITS TO TEST: ' 
.ASCIZ '% REINITIALIZE ERROR: 



.ASCIZ 
.ASCIZ 



DATA error:' 

FILL BUFFER ERROR: 



RXAE DEC/Xll SYSTEM EX 
XRXAEO.Pll 12-0CT-7 



ERCISER MODULE 
12:16 




8111?? 

mm 

052111 
052111 

m 

042" ' 

m 

047 
051 



042516 
""2040 
2517 



040 
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MSGIO: .ASCIZ ' HARD ERROR:' 

MSGll: .ASCIZ ' UNIT NOT AVAILABLE' 

MSG12: .ASCIZ ' UNIT 1 NOT AVAILABLE' 

MSG13: .ASCIZ ' DONE BIT TIME OUT: ' 

MSG14: .ASCIZ ' TRANSFER READY TIME OUT: ' 



052517 



003215' 



dnom: 
rtyn: 



rter: 
DTER: 

bfer: 

ORPi: 
DRP2: 
DRP3: 



• EVEN 
.ASCIZ 
.EVEN 
.ASCIZ 

.EVEN 

MSG3 

DNUM 

MS61 

R|YN 

MSG3 
DNOM 

mi 

-1 

NSG3 
DNUM 
MSGS 

MSG3 
DNUM 
MSG9 

MSGS 
MSG4 
-1 

MSG6 
M|G4 

MSG7 
MSG4 
-I 
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m mm-mw 

770 003S56- 003321 

i m 11 

774 003566' 003375 

Pl §ipi ill 



1 



003602' 
004004* 



0042 
000001 



hrde: 


M|G10 


NONTOX 


NSGll 


MUHTl: 


m|612 


DMTOI 


MS613 
NS64 


fRTO: 


HS614 
N|G4 

.EVEN 


hbuf: 

RBOF: 




.=.♦200 


.=.♦200 
• END 



SEQ 0017 



;VRITE BUFFER 
;REA0 BUFFER 




RXiiE DEC 
XRXAEO.P 

DVIDl 
DVIDlX 

EXITS = 

riHi 

GE?PAS= 

HRDCH^ 
HRDE 
HRDE 
HRDPA 
ICONT 
ICOOMT 
IDHDM 
IHIt 

mm 



/Xll SYSTEM EXERCISER MODULE 
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00QQ14R 
0275"" 
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CROSS REFERENCE TABLE — USER S¥HBCLS 



O^R - 

BPSi' It 



002750R 
001054R 

ml 



_DRgp 

MAP22 

HQDNAI 
MODSP 
MSGNS 

HSGSS 

MSGS 

MSG! 

Ml 

MSGli 

MSGl 
MSG- 

MSG! 
HS6 



R 

000030R 
OO0I46R 



r m 



0060001 

003O4K! 



14 003421 

1 mw 



MSG4 
MSGS 
MSG6 
MSG7 
MSGS 
MSG9 
MTRUPT 
HULL = 
NUNTO 
HUMTl 
OPEN = 

OTOAS = 
PASCMT 
PCHTR 
PIRQS = 
PQPSP = 

PRT¥0 = 
PRTYl = 
PRTY2 = 



003375R 
00|421R 

_7R 
663i27R 

im 

003243R 

nm 

QQ3556R 
104420 

mw 

005726 



odoooo 



Hit 



292 

if 



m 



I i 



111: 

693: 

1 



62* 



245« 



245| 



243« 



7? 

48 
741 
7|0 

Ij 
W 

if 



245* 





310 


631# 
















m' 

346# 


318* 


456* 


513* 


520* 


601* 


621* 








542 


605 


625 














307 


320 


458 


515 


522 


603 


623 








276 


295 


304 


317 


325 


455 


512 


519 


532 


539 


746 
763 


751 
766 


755 
775 


778 














320 
304 


458 
770# 


603 


623 














Wi 


m 


m 


m 


m 




221 


222 


223 


224 


423 


425 


427* 


644$ 















225 



000140 
000200 
000240 

fill 

177776 
005746 
024646 
104417 
000054R 



mi 

3460R 
3010R 



002774R 
-0300" 
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PRTY3 s 
PRTY4 = 
PRTY5 = 
PRTY6 = 
pRTY7 = 

PSM = 
POSH = 
PUSH2 = 
RANDS := 
RANNU^t 

im 

RESTRT 
RESl 
RES2„ 
RSTRT 
RIER 
RTYN 
RXCS 

RXDB 

SA 

SASAV 

SBADR 
SECK 
SELD 
SERPL 
SOFCMT 
S0FERS= 
SOFPAS 
SPOINT 
SPSIZ = 
SRXCS 
SRXES 
SRXSA 
SRXSB 
SRXTA 
SRI 
SR2 
SR3 
SR4 
START 
STAT 
SVRO 
SYRl 
SVR2 
SVR3 
SVR4 
SVR5 
SVR6 
SjSCNT 

TABLE 

TASAV 



003 

00Q--_ 
002022 



2R 

5r 

IR 
2R 

JqOQ46R 
000032R 
000040 
003020R 

lit 

003026R 
000016R 
20R 



0000 
00" 



m 



!4P 
24R 
26R 

k 
% 

.2R 
74R 



003Q32R 
002776R 
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CROSS REFERENCE TABLE — USER SYMBOLS 



fir 



247# 



SEQ 0020 



245# 



359 
360 

m 

258 



w 



213 
575* 
493# 

m* m» 



264 

PI* 




|J0# 679- 



iii' 412* 413 415* 

m- III m tin 



B If ill: 111 \i\ 



ii 



462* 
503 



676 
671 



415* 433* 
429* 



466 
430 



489 
432* 



501 
433 



640# 
642# 



RXAE DEC 
XRXAEO.P 



/Xll SYSTEM EXERCISER MODULE 
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CROSS RBFEREMCE TABLE — OSES S¥HICLS 



SEQ 0021 



TDRP 

if- 

TSS 

El 

utf 

VEC 

HASADR 

|L 

HflR 



043gR 
0556R 

IP 

ooosiIr 

4R 

2R 
4R 

miil 

"3602R 

Iw 

'*~'6R 
dd42d6R 



if 



llli 



it 

?s1l 



lilt 

r?!t 



737t 



610* 

309* 

460 

475 

566 

4391 

m 

740# 



615* 

m 

483 

783# 

546 

m- 

784# 



6451 



6321 



636# 



mi 

7861 



ABS, 000000 000 
004206 001 



ERRORS DETECTED: 
DEFAULT GLOBALS GENERATED: 

XRXAEO*XRXAEO/SgL, --. 
RUM-TIME: 1 2 .3^|EC0|DS 
RUB-TIME RATIO: 2?/4f?.0 
CORE USED: 7K 



XRpEOj-XRXAEg/SgL^CRySYMsDDXCOM^XRXAEO 

H^^pJges) 



